home *** CD-ROM | disk | FTP | other *** search
/ Mega Game 2000 #3 / Mega Game № 03 2000.iso / Data / Mainmenu.dxr / Script_15_TimeEff_1.ls < prev    next >
Encoding:
Text File  |  2000-02-15  |  952 b   |  41 lines

  1. global counterTimeOut
  2.  
  3. on exitFrame
  4.   if the frame = label("Eff") then
  5.     if counterTimeOut >= 40 then
  6.       counterTimeOut = 0
  7.       tmpStep = random(10)
  8.       go(label("Eff") + tmpStep)
  9.     else
  10.       counterTimeOut = counterTimeOut + 1
  11.     end if
  12.   else
  13.     if the frame <= (label("Eff") + 10) then
  14.       if counterTimeOut >= 22 then
  15.         counterTimeOut = 0
  16.         tmpStep = random(14)
  17.         if (tmpStep = 13) or (tmpStep = 14) then
  18.           go(label("Eff"))
  19.         else
  20.           go(label("Eff") + tmpStep)
  21.         end if
  22.       else
  23.         counterTimeOut = counterTimeOut + 1
  24.       end if
  25.     else
  26.       if counterTimeOut >= 30 then
  27.         counterTimeOut = 0
  28.         tmpStep = random(14)
  29.         if (tmpStep = 13) or (tmpStep = 14) then
  30.           go(label("Eff"))
  31.         else
  32.           go(label("Eff") + tmpStep)
  33.         end if
  34.       else
  35.         counterTimeOut = counterTimeOut + 1
  36.       end if
  37.     end if
  38.   end if
  39.   go(the frame)
  40. end
  41.